home *** CD-ROM | disk | FTP | other *** search
/ Holt Researcher: American History / Holt Researcher: American History.iso / pc / modules / tour.dxr / 00440.ls < prev    next >
Encoding:
Text File  |  2000-01-21  |  526 b   |  22 lines

  1. on exitFrame
  2.   global gMenuList, whereTo
  3.   xSprite = 15
  4.   howLong = member(the member of sprite xSprite).duration
  5.   if sprite(xSprite).movieTime < howLong then
  6.     sprite(xSprite).movieRate = 1
  7.     whereTo = "here"
  8.   else
  9.     sprite(xSprite).movieRate = 0
  10.     whereTo = "forward"
  11.   end if
  12.   if whereTo = "here" then
  13.     go(the frame)
  14.   else
  15.     set the puppet of sprite xSprite to 1
  16.     sprite(xSprite).movieRate = 0
  17.     sprite(xSprite).visible = 0
  18.     set the puppet of sprite xSprite to 0
  19.     go(the frame + 1)
  20.   end if
  21. end
  22.